Вводится любая строка. Надо вывестина печать количество повторений второго символа от начала данной строки и треьего символа с конца данной строки- QBasic(Бейсик)

LINE INPUT "Vvedite stroky: ", a$
b$ = MID$(a$, 2, 1)
c$ = MID$(a$, LEN(a$) - 2, 1)
FOR i = 1 TO LEN(a$)
    IF MID$(a$, i, 1) = b$ THEN s = s + 1
    IF MID$(a$, i, 1) = c$ THEN g = g + 1
NEXT
PRINT "Kolichestvo povtorenij  2 simvola"; s
PRINT "Kolichestvo povtorenij 3 simvola "; g